CAAPlanetPerihelionAphelion_SaturnPerihelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_SaturnPerihelion", k)
}
